home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v10n06.arc / TENMAC.WWD < prev    next >
Text File  |  1991-03-06  |  3KB  |  107 lines
  1. «MDNM»For PC users who don't like taking their hands
  2. off the typing keys, here are six macros that let you
  3. move the cursor without moving your hands.  Using E, 
  4. X,
  5. S, and D as four points of the compass, assign ArrowLeft
  6. to ^S, ArrowRight to ^D, ArrowUp to ^E, and ArrowDown to
  7. ^X.  Extending that geographic mnemonic slightly, assign
  8. WordLeft to ^A and WordRight to ^F.  
  9.  
  10. ******************************************************  
  11. ArrowLeft   
  12. ******************************************************  
  13. Sub MAIN
  14. CharLeft 1
  15. End Sub
  16.  
  17. *******************************************************
  18. ArrowRight   
  19. ******************************************************  
  20. Sub MAIN
  21. CharRight 1
  22. End Sub
  23.  
  24. *******************************************************
  25. ArrowUp  
  26. ******************************************************  
  27.  
  28. Sub MAIN
  29. LineUp 1
  30. End Sub
  31.  
  32. *******************************************************
  33. ArrowDown   
  34. ******************************************************  
  35. Sub MAIN
  36. LineDown 1
  37. End Sub
  38.  
  39. *******************************************************
  40. WordLeft 
  41. ******************************************************  
  42. Sub MAIN
  43. WordLeft 1
  44. End Sub
  45.  
  46. *******************************************************
  47. WordRight 
  48. ******************************************************  
  49.  
  50. Sub MAIN
  51. WordRight 1
  52. End Sub
  53.  
  54.  
  55. Following are three deletion macros:  for character, word,
  56. and line.  Assign them to the control-key combination of
  57. your choice, and they will let you perform the most common
  58. deletions without taking your hands from the typing keys. 
  59. A good set of mnemonics would be ^C for delete character,
  60. ^W for delete word, and ^L for delete Line.
  61.  
  62. *******************************************************
  63. DeleteCharacter 
  64. ******************************************************  
  65. Sub MAIN
  66. CharRight 1, 1
  67. EditClear
  68. End Sub
  69.  
  70. *******************************************************
  71. DeleteWord   
  72. ******************************************************  
  73.  
  74. Sub MAIN
  75. WordRight 1, 1
  76. EditCut
  77. End Sub
  78.  
  79. *******************************************************
  80. DeleteLine  
  81. ******************************************************  
  82. Sub MAIN
  83. StartOfLine
  84. EndOfLine 1
  85. EditCut
  86. End Sub
  87.  
  88. Finally, here's a macro that will take you to the file
  89. open dialog box and list the files available in any given
  90. directory -- in this example, the DATA directory on C.
  91. If you keep your files in several directories, you'll
  92. find this extremely useful for moving among your direc-
  93. tories.
  94. *******************************************************
  95.  
  96. Data 
  97. ******************************************************  
  98. Sub MAIN
  99. Dim DRecord As FileOpen
  100. GetCurValues DRecord
  101. DRecord.Name = "C:\DATA\*.*"
  102. SendKeys "{enter}{tab}{down}"
  103. On Error Goto Skip
  104. Dialog DRecord
  105. Super FileOpen DRecord
  106. Skip: End Sub
  107.